sink("PoetsMaleWhiteNotWhite.txt")
t.test(PoetsMaleWhite$RangeLog, PoetsMaleNotWhite$RangeLog)
t.test(PoetsMaleWhite$SDLog, PoetsMaleNotWhite$SDLog)
t.test(PoetsMaleWhite$MeanLog, PoetsMaleNotWhite$MeanLog)
t.test(PoetsMaleWhite$WPM, PoetsMaleNotWhite$WPM)
t.test(PoetsMaleWhite$PauseSD, PoetsMaleNotWhite$PauseSD)
t.test(PoetsMaleWhite$PauseCount025, PoetsMaleNotWhite$PauseCount025)
t.test(PoetsMaleWhite$PauseAvVal025, PoetsMaleNotWhite$PauseAvVal025)
t.test(PoetsMaleWhite$PauseCount05, PoetsMaleNotWhite$PauseCount05)
t.test(PoetsMaleWhite$PauseCount1, PoetsMaleNotWhite$PauseCount1)
t.test(PoetsMaleWhite$PauseCount2, PoetsMaleNotWhite$PauseCount2)
sink()

sink("PoetsFemaleWhiteNotWhite.txt")
t.test(PoetsFemaleWhite$RangeLog, PoetsFemaleNotWhite$RangeLog)
t.test(PoetsFemaleWhite$SDLog, PoetsFemaleNotWhite$SDLog)
t.test(PoetsFemaleWhite$MeanLog, PoetsFemaleNotWhite$MeanLog)
t.test(PoetsFemaleWhite$WPM, PoetsFemaleNotWhite$WPM)
t.test(PoetsFemaleWhite$PauseSD, PoetsFemaleNotWhite$PauseSD)
t.test(PoetsFemaleWhite$PauseCount025, PoetsFemaleNotWhite$PauseCount025)
t.test(PoetsFemaleWhite$PauseCount05, PoetsFemaleNotWhite$PauseCount05)
t.test(PoetsFemaleWhite$PauseCount1, PoetsFemaleNotWhite$PauseCount1)
t.test(PoetsFemaleWhite$PauseCount2, PoetsFemaleNotWhite$PauseCount2)
t.test(PoetsFemaleWhite$SDLinear, PoetsFemaleNotWhite$SDLinear)
t.test(PoetsFemaleWhite$RangeLinear, PoetsFemaleNotWhite$RangeLinear)
sink()